HRESULT GetObject(BSTR key, [out,retval] IDispatch ** pVal);

GetObject(String key, [out,retval] IDispatch * pVal);

Sub GetObject(key As String, pVal As [out,retval] IDispatch *)